home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Collection of Tools & Utilities
/
Collection of Tools and Utilities.iso
/
dskut
/
tbfence1.zip
/
CONVERT.BAT
< prev
next >
Wrap
DOS Batch File
|
1993-08-25
|
2KB
|
85 lines
@echo off
rem Sample batch file to automatically scan a diskette for viruses
rem and convert it to TbFence format.
rem This batch file uses our virus scanner TbScan to check a diskette
rem before allowing the converstion to take place.
rem TbScan is distributed worldwide on Bulletin Board Systems in an
rem archive named TBAV???.ZIP. Of cours you can also contact us if
rem you want an evaluation sample.
:start
echo.
echo Put a diskette into drive A:
pause
tbfence query a:
if errorlevel 10 goto read_err
if errorlevel 2 goto start
tbscan a: nomem batch log ll=0
cls
if errorlevel 255 goto bigtrouble
if errorlevel 5 goto infected
if errorlevel 4 goto probably
if errorlevel 3 goto changed
if errorlevel 2 goto read_err
echo TbScan has checked the diskette and is quite sure that it does not
echo contain a virus.
echo.
tbfence encrypt a:
echo.
if errorlevel 255 goto notbfence
if errorlevel 11 goto write_err
if errorlevel 10 goto read_err
echo The diskette is now ready for use on TbFence machines!
echo If you do not want to convert another diskette, press Ctrl-C
echo Remove the diskette...
pause
goto start
:read_err
goto start
:write_err
echo It is not possible to write to the diskette in drive A:
echo Please make sure the write protect tab is in the right position!
goto start
:bigtrouble
echo The sanity check of TbScan failed! This indicates that TbScan is
echo very probably infected. This is NOT caused by the diskette in
echo drive A:, but this means that your system was already infected!
echo Please power down the machine and consult a virus expert!
:loop
goto loop
:infected
echo The diskette contains one or more viruses!
echo.
if exist tbscan.log type tbscan.log
pause
goto start
:probably
echo The diskette probably contains one or more viruses!
echo Please check if the results listed below can be explained.
echo If this is not the case, the diskette probably contains a virus!
echo.
if exist tbscan.log type tbscan.log
pause
goto start
:changed
echo A TBAV checksum file was found on the diskette, but the checksum
echo information did not match the actual file information. The files
echo on the diskette have been changed afterwards. Please find out what
echo happened!
pause
goto start
:notbfence